home *** CD-ROM | disk | FTP | other *** search
/ TeX 1995 July / TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / macros / tip / ts-gnot.tip < prev    next >
Text File  |  1993-09-15  |  2KB  |  69 lines
  1. % This macro source file is from the four volume series
  2. % "TeX in Practice" by Stephan von Bechtolsheim, published
  3. % 1993 by Springer-Verlag, New York.
  4. % Copyright 1993 Stephan von Bechtolsheim.
  5. % No warranty or liability is assumed.
  6. % This macro may be copied freely if no fees other than
  7. % media cost or shipping charges are charged and as long
  8. % as this copyright and the following source code itself
  9. % is not changed. Please see the series for further information.
  10. %
  11. % Version: 1.0
  12. % Date: May 1, 1993
  13. %
  14. %
  15. % This source code is documented in 31.2.8, p. III-602.
  16. % Original source in file "pp2.TEX", starting line 846.
  17. \wlog{L: "ts-gnot.tip" ["pp2.TEX," l. 846, p. III-602]}%
  18. % This file DOES NOT belong to format "texip."
  19. \catcode`\@ = 11
  20. \def\GeneralNotes #1#2{%
  21.     \NewPageRightHand
  22.     \SetPageLayout{4}
  23.     \ReassignCounter{PageNo}{\roman}%
  24.         {\TheCounter{PageNo}}{\TheCounter{PageNo}}
  25.     \ReassignCounter{SectionNo}{\arabic}% 
  26.         {\TheCounter{SectionNo}}% 
  27.         {\TheCounter{SectionNo}}%
  28.     \SetCounter{SectionNo}{0}%
  29.     \def\@LeftRunningHead{#1}
  30.     \def\@RightRunningHead{\@LeftRunningHead}
  31.     \WriteToAuxSpecial{toc}{0}% 
  32.         {}{#1 #2}% 
  33.         {\PrintCounter{PageNo}}%
  34.     \ChapterHeadingTeXIP{#1}%
  35.         {#2}
  36. }
  37. \def\GSection{\DblArg{\@GSection}}%
  38. \def\@GSection [#1]#2{% 
  39.     \StepCounter{SectionNo}%
  40.     \def\Label ##1{\@Label{##1}{\RefCounter{SectionNo}}{1}}%
  41.     \GenericHeading{2}{36pt plus 10pt minus 2pt}
  42.         {1}{1}{1}{24pt}{0}%
  43.         {\Large\baselineskip = 15pt}{-13pt}% 
  44.         {\PrintCounter{SectionNo}}{#2}{#1}% 
  45.     \gdef\EveryParB{%
  46.         {%
  47.             \@MakeRobustMacros
  48.             \wlog{MARK: "#2"}%
  49.             \mark{#2}%
  50.         }%
  51.     }%
  52. }
  53. \def\EndGeneralNotes{%
  54.     \wlog{\string\EndGeneralNotes: called}%
  55.     \NewPageRightHandSpecial
  56.     \SetCounter{PageNo}{1}
  57.     \@PageNumbersToCounterRegs
  58.     \ReassignCounter{PageNo}{\arabic}%
  59.         {\TheCounter{PageNo}}% 
  60.         {\TheCounter{VolumeNo}-\TheCounter{PageNo}}
  61.     \wlog{\string\EndGeneralNotes: \noexpand\count0
  62.         has value \the\count0}%
  63.     \count1 = 0
  64.     \ReassignCounter{SectionNo}{\arabic}% 
  65.         {\TheCounter{ChapterNo}.\TheCounter{SectionNo}}% 
  66.         {\TheCounter{ChapterNo}.\TheCounter{SectionNo}}
  67. }
  68. \catcode`\@ = 12
  69.